(tpu-set-mode-line): Add element for column number.

diff --git a/lisp/emulation/tpu-edt.el b/lisp/emulation/tpu-edt.el
index 6c590f6de3f31b852ae0ef30663a49972cbb81d2..59abca4a5d23f631c1b5f0bcdb7cece7c499127b 100644 (file)
--- a/lisp/emulation/tpu-edt.el
+++ b/lisp/emulation/tpu-edt.el
@@ -434,6 +434,7 @@ GOLD is the ASCII 7-bit escape sequence <ESC>OP.")
                             (purecopy "%n")
                             (purecopy ")%]--")
                             (purecopy '(line-number-mode "L%l--"))
+                            (purecopy '(column-number-mode "C%c--"))
                             (purecopy '(-3 . "%p"))
                             (purecopy "-%-")))
         (or (assq 'tpu-newline-and-indent-p minor-mode-alist)